Fix typo in previous browse-url-file-url change

* lisp/net/browse-url.el (browse-url-file-url): Fix typo in
previous change.

diff --git a/lisp/net/browse-url.el b/lisp/net/browse-url.el
index ccb4e12a9f13daca024d69daa23b23f5b5c4906e..17169fec0f08c8b2b2aafe59b0f3e559e2b0fc30 100644 (file)
--- a/lisp/net/browse-url.el
+++ b/lisp/net/browse-url.el
@@ -724,7 +724,7 @@ Use variable `browse-url-filename-alist' to map filenames to URLs."
            ;; reasons.
            (seq-find (lambda (match)
                        (and (string-match-p (car match) file)
-                            (not (string-match "\\`file:" (cadr match)))))
+                            (not (string-match "\\`file:" (cdr match)))))
                      browse-url-filename-alist))
       (setq file (browse-url-url-encode-chars file "[*\"()',=;?% ]"))
     ;; Encode all other file names properly.